home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1995 March / Macworld CD-ROM (March 1995).cdr / Demos / Paper Planes / Help / 00021.ls < prev    next >
Encoding:
Text File  |  1994-08-18  |  299 b   |  14 lines
  1. on mouseDown
  2.   global theVCRButtons, theGauge
  3.   mCancelPlay(theVCRButtons)
  4.   mCancelFastFwd(theVCRButtons)
  5.   mDragLevel(theGauge)
  6. end
  7.  
  8. on mouseUp
  9.   global Plane, theGauge
  10.   mReleaseDrag(theGauge)
  11.   set toStep to mGetCurrentLevel(theGauge)
  12.   go(label("P" & string(Plane) & "S" & string(toStep)))
  13. end
  14.